object FLancamentoCheque: TFLancamentoCheque
  Left = 287
  Top = 169
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Lan'#231'amento com Cheque'
  ClientHeight = 397
  ClientWidth = 498
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object pnControle: TPanel
    Left = 0
    Top = 0
    Width = 498
    Height = 41
    Align = alTop
    TabOrder = 0
    object btnNovo: TBitBtn
      Tag = 30
      Left = 8
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Novo'
      TabOrder = 0
      OnClick = btnNovoClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
        07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
        0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
    end
    object btnCancelar: TBitBtn
      Tag = 30
      Left = 88
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Cancelar'
      Enabled = False
      TabOrder = 1
      OnClick = btnCancelarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
        993337777F777F3377F3393999707333993337F77737333337FF993399933333
        399377F3777FF333377F993339903333399377F33737FF33377F993333707333
        399377F333377FF3377F993333101933399377F333777FFF377F993333000993
        399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
        99333773FF777F777733339993707339933333773FF7FFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
    object btnSalvar: TBitBtn
      Tag = 30
      Left = 168
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Salvar'
      Enabled = False
      TabOrder = 2
      OnClick = btnSalvarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
        7700333333337777777733333333008088003333333377F73377333333330088
        88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
        000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
        FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
        99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
    end
    object btnFechar: TBitBtn
      Tag = 30
      Left = 416
      Top = 8
      Width = 75
      Height = 25
      Caption = '&Fechar'
      TabOrder = 3
      OnClick = btnFecharClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
    object btnExcluir: TBitBtn
      Left = 248
      Top = 8
      Width = 75
      Height = 25
      Hint = 'Exclui Todas as Baixas Relativas a este cheque'
      Caption = '&Excluir'
      TabOrder = 4
      Visible = False
      OnClick = btnExcluirClick
      Glyph.Data = {
        5A010000424D5A01000000000000760000002800000012000000130000000100
        040000000000E400000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888890000008988888888888888980000008998877777777779880000008999
        0000000000998800000088990BFFFBFFF9988800000088899FCCCCCCF9788800
        0000888999FBFFFB9978880000008888999CCC9990788800000088880999FB99
        F0788800000088880FC9999CF0788800000088880FF9999BF078880000008888
        0FC9999000788800000088880B99F099F0788800000088880999F09999888800
        0000888999FBF0F0899888000000899990000008889988000000899988888888
        888898000000888888888888888889000000888888888888888888000000}
    end
  end
  object pnPrincipal: TPanel
    Left = 0
    Top = 41
    Width = 498
    Height = 352
    Align = alTop
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 23
      Height = 13
      Caption = 'Data'
    end
    object Label2: TLabel
      Left = 120
      Top = 8
      Width = 28
      Height = 13
      Caption = 'Conta'
    end
    object Label3: TLabel
      Left = 8
      Top = 56
      Width = 37
      Height = 13
      Caption = 'Cheque'
    end
    object Label4: TLabel
      Left = 120
      Top = 56
      Width = 63
      Height = 13
      Caption = 'Data Cheque'
    end
    object Label5: TLabel
      Left = 224
      Top = 56
      Width = 53
      Height = 13
      Caption = 'Favorecido'
    end
    object lbValor: TLabel
      Left = 307
      Top = 320
      Width = 180
      Height = 20
      Alignment = taRightJustify
      Caption = 'Valor do Cheque: 0,00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lbSaldo: TLabel
      Left = 352
      Top = 9
      Width = 134
      Height = 13
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Saldo:'
    end
    object edDataLanc: TDateEdit
      Tag = 30
      Left = 8
      Top = 24
      Width = 100
      Height = 21
      Enabled = False
      NumGlyphs = 2
      TabOrder = 0
    end
    object edDataCheque: TDateEdit
      Tag = 30
      Left = 120
      Top = 72
      Width = 100
      Height = 21
      Enabled = False
      NumGlyphs = 2
      TabOrder = 3
      OnExit = edDataChequeExit
    end
    object DBLCBConta: TDBLookupComboBox
      Tag = 30
      Left = 120
      Top = 24
      Width = 369
      Height = 21
      Enabled = False
      KeyField = 'CONT_CORR_CODIGO'
      ListField = 'CONT_CORR_DESCRICAO'
      ListSource = dsConta
      TabOrder = 1
      OnExit = DBLCBContaExit
      OnKeyDown = DBLCBContaKeyDown
    end
    object edCheque: TEdit
      Tag = 30
      Left = 8
      Top = 72
      Width = 100
      Height = 21
      Enabled = False
      TabOrder = 2
    end
    object edFavorecido: TEdit
      Tag = 30
      Left = 224
      Top = 72
      Width = 265
      Height = 21
      CharCase = ecUpperCase
      Enabled = False
      MaxLength = 60
      TabOrder = 4
    end
    object gbListaTitulos: TGroupBox
      Left = 8
      Top = 104
      Width = 481
      Height = 209
      Caption = '  T'#237'tulos  '
      TabOrder = 5
      object dbgTemp: TDBGrid
        Left = 8
        Top = 16
        Width = 465
        Height = 185
        DataSource = dsTemp
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnKeyDown = dbgTempKeyDown
        OnTitleClick = dbgTempTitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'CODIGO'
            Title.Caption = 'C'#243'digo'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'VENCIMENTO'
            Title.Caption = 'Vencimento'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Width = 81
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'FORNECEDOR'
            Title.Caption = 'Fornecedor'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Width = 173
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'VALOR'
            Title.Caption = 'Valor'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'HISTORICO1'
            Title.Caption = 'Hist'#243'rico 1'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'HISTORICO2'
            Title.Caption = 'Hist'#243'rico 2'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'MS Sans Serif'
            Title.Font.Style = [fsBold]
            Visible = True
          end>
      end
    end
    object btnConsultaTitulo: TBitBtn
      Left = 8
      Top = 320
      Width = 75
      Height = 25
      Caption = '&T'#237'tulos'
      Enabled = False
      TabOrder = 6
      OnClick = btnConsultaTituloClick
      Glyph.Data = {
        42010000424D4201000000000000760000002800000011000000110000000100
        040000000000CC00000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        88888000000080000000008888888000000080FFFFFFF08888800000000080F8
        8888F08888000000000080F88888F08880008000000080F88870007800088000
        000080F8800FFF0000888000000080F807FFFF0708888000000080F70E000F08
        07888000000080F0EFEFEF0880888000000080F0F0000F088088800000008000
        EFEFFF0880888000000088870000000807888000000088880088888708888000
        0000888880088800888880000000888888700078888880000000888888888888
        888880000000}
    end
  end
  object dsConta: TDataSource
    DataSet = DMFinanceiro.QConta
    OnDataChange = dsContaDataChange
    Left = 248
    Top = 32
  end
  object cdsTemp: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <
      item
        Name = 'cdsTempIndex1'
      end>
    Params = <>
    StoreDefs = True
    BeforePost = cdsTempBeforePost
    AfterPost = cdsTempAfterPost
    AfterDelete = cdsTempAfterDelete
    Left = 48
    Top = 208
  end
  object dsTemp: TDataSource
    DataSet = cdsTemp
    Left = 96
    Top = 208
  end
  object qaux: TQuery
    DatabaseName = 'base'
    Left = 160
    Top = 296
  end
end
